home *** CD-ROM | disk | FTP | other *** search
/ Aminet 6 / Aminet 6 - June 1995.iso / Aminet / text / print / LJ4Boost101.lha / LJ4Boost / LJ4Boost-Install < prev    next >
Encoding:
Text File  |  1995-04-07  |  4.8 KB  |  159 lines
  1. ; -------------------------------------------------------------------------
  2. ; $VER: LJ4Boost-Install 1.0 (06.04.95)
  3. ;
  4. ; Installer-Script for LJ4Boost V1.0
  5. ; Copyright © 1995 by Oliver Hitz
  6.  
  7. ; TEXTS -------------------------------------------------------------------
  8.  
  9. (set #lj4b-install
  10.   (cat "\nLJ4Boost V1.0\n"
  11.        "Installer Script\n\n"
  12.        "© 1995 by Oliver Hitz\n\n"
  13.        "Click on >Continue< to proceed!\n"
  14.   )
  15. )
  16.  
  17. (set #lj4b-install-help
  18.   (cat "This installer script installs the LJ4Boost Printer Driver Package V1.0\n\n")
  19. )
  20.  
  21. (set #lj4b-driver
  22.   (cat "\nCopy the printer driver to DEVS:Printers?")
  23. )
  24.  
  25. (set #lj4b-driver-help
  26.   (cat "The printer driver is the main program of this package. It is copied to the other printer drivers which are in the directory DEVS:Printers.\n")
  27. )
  28.  
  29. (set #lj4b-prefs
  30.   (cat "\nCopy the preferences editor to SYS:Prefs?")
  31. )
  32.  
  33. (set #lj4b-prefs-help
  34.   (cat "The preferences editor lets you take control over some special features that this package offers.\n")
  35. )
  36.  
  37. (set #lj4b-prefscat
  38.   (cat "\nDo you want to install the german catalog file?")
  39. )
  40.  
  41. (set #lj4b-prefscat-help
  42.   (cat "Unfortunately there are only two languages available at the moment. But this will (hopefully) change in future versions.\n")
  43. )
  44.  
  45. (set #lj4b-doc
  46.   (cat "\nInstall the documentation?")
  47. )
  48.  
  49. (set #lj4b-doc-help
  50.   (cat "Sometimes it is useful to have the documentation ready-to-use somewhere on the hard drive. The documentation is NOT needed by the program.")
  51. )
  52.  
  53. (set #lj4b-register
  54.   (cat "\nThe LJ4Boost Printer Driver Package\n"
  55.        "is SHAREWARE. If you use it, you HAVE TO pay\n"
  56.        "for it.\n\n"
  57.        "Do you want to install the Registration-Utility?\n"
  58.        "(It is suggested you install it in the same\n"
  59.        "directory as the docs, because it can be started\n"
  60.        "from the documentation)."
  61.   )
  62. )
  63.  
  64. (set #lj4b-register-help
  65.   (cat "It is strongly recommended to install the Registration-Utility. After you have registered, you can of course delete it...")
  66. )
  67.  
  68. (set #wrong-kick
  69.   (cat "\nSorry, this package needs at least\n"
  70.        "Kickstart version 2.0!\n\n"
  71.   )
  72. )
  73.  
  74. ; VARS --------------------------------------------------------------------
  75.  
  76. (set sourcePath (expandpath (pathonly @icon)))
  77.  
  78. (set ver (/ (getversion "exec.library" (resident)) 65536))
  79.  
  80. ; MAIN --------------------------------------------------------------------
  81.  
  82. (complete 0)
  83. (if (> ver 36)
  84.   (if (askbool (prompt #lj4b-install)
  85.                (help #lj4b-install-help)
  86.                (choices "Continue" "End Installation")
  87.                (default 1)
  88.       )
  89.     (
  90.       (if (askbool (prompt #lj4b-driver)
  91.                    (help #lj4b-driver-help)
  92.                    (choices "Copy" "Skip This Part")
  93.                    (default 1)
  94.           )
  95.           (Copyfiles (source (tackon sourcePath "Devs/Printers/LJ4Boost"))
  96.                      (dest "DEVS:Printers")
  97.                      (infos)
  98.           )
  99.       )
  100.       (complete 25)
  101.       (if (askbool (prompt #lj4b-prefs)
  102.                    (help #lj4b-prefs-help)
  103.                    (choices "Copy" "Skip This Part")
  104.                    (default 1)
  105.           )
  106.           (Copyfiles (source (tackon sourcePath "Prefs/LJ4Boost"))
  107.                      (dest "SYS:Prefs")
  108.                      (infos)
  109.           )
  110.       )
  111.       (complete 40)
  112.       (if (askbool (prompt #lj4b-prefscat)
  113.                    (help #lj4b-prefscat-help)
  114.                    (choices "Yes" "No")
  115.                    (default 2)
  116.           )
  117.           (Copyfiles (source (tackon sourcePath "Locale/Catalogs/deutsch/lj4boostprefs.catalog"))
  118.                      (dest "LOCALE:Catalogs/deutsch")
  119.                      (infos)
  120.           )
  121.       )
  122.       (complete 50)
  123.       (if (askbool (prompt #lj4b-doc)
  124.                    (help #lj4b-doc-help)
  125.                    (choices "Copy" "Skip This Part")
  126.                    (default 1)
  127.           )
  128.           (Copyfiles (source (tackon sourcePath "LJ4Boost.guide"))
  129.                      (dest (askdir (prompt "Please select a place to the documentation.")
  130.                                    (help @askdir-help)
  131.                                    (default "SYS:Tools")
  132.                            )
  133.                      )
  134.                      (infos)
  135.           )
  136.       )
  137.       (complete 75)
  138.       (if (askbool (prompt #lj4b-register)
  139.                    (help #lj4b-register-help)
  140.                    (choices "Copy" "Skip This Part")
  141.                    (default 1)
  142.           )
  143.           (Copyfiles (source (tackon sourcePath "LJ4Boost-Register"))
  144.                      (dest (askdir (prompt "Please select a place for the Registration-Utility.")
  145.                                    (help @askdir-help)
  146.                                    (default "SYS:Tools")
  147.                            )
  148.                      )
  149.                      (infos)
  150.           )
  151.       )
  152.       (complete 99)
  153.     )
  154.   )
  155.   (abort #wrong-kick)
  156. )
  157. (set @default-dest "DEVS:Printers")
  158.  
  159.